 cond
 start
 *.body 1500 div 50 mult .repro store
 -1 .shoot store
 10 .up store
 *.aim 251 div 2 ceil 1 floor 1 sub .aimdx store
 stop
 end